home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Archives / ForCLI / multibox.lha / MultiBox / Examples / Example2 < prev   
Encoding:
Text File  |  1992-07-03  |  580 b   |  24 lines
  1. failat 65537                    ; this should be set high enough - for more read the docs
  2. /multibox HAIL MultiBoxRequest! TITLE "Format drive DF0:" BOXES FFS_|NOICONS|QUICK_
  3. set result $RC                    ; save the return code
  4.  
  5. set opt1 ""            ; initialize local vars
  6. set opt2 ""
  7. set opt3 ""
  8.  
  9. if 1 EQ `eval $result & 1`
  10.     set opt1 FFS
  11. endif
  12. if 2 EQ `eval $result & 2`
  13.     set opt2 NOICONS
  14. endif
  15. if 4 EQ `eval $result & 4`
  16.     set opt3 QUICK
  17. endif
  18. if 65536 EQ $result
  19.     Endcli
  20. endif
  21.  
  22. Echo "I'll format drive df0 whith the following opts: $opt1 $opt2 $opt3*N"
  23. sys:system/Format drive df0: NAME BLANK $opt1 $opt2 $opt3
  24.